Holds the fields making up an address for a Mac OS X Address Book.
Example
This example gets the current user's address and puts it in an EditField.
Dim book as AddressBook
Dim address as AddressBookAddress
Dim data as AddressBookData
Dim s as String
book= System.AddressBook
data=book.CurrentUser.Addresses
If data.count >0 then
Address=data.value(0)
s=address.StreetAddress+Address.City+", "+Address.state+ " "+address.Zip
else
s="Count is zero!"
end if
EditField1.text=s
Dim address as AddressBookAddress
Dim data as AddressBookData
Dim s as String
book= System.AddressBook
data=book.CurrentUser.Addresses
If data.count >0 then
Address=data.value(0)
s=address.StreetAddress+Address.City+", "+Address.state+ " "+address.Zip
else
s="Count is zero!"
end if
EditField1.text=s
See Also
AddressBook, AddressBookContact, AddressBookData, AddressBookGroup, AddressBookRecord classes.